home *** CD-ROM | disk | FTP | other *** search
/ Freaks Macintosh Archive / Freaks Macintosh Archive.bin / Freaks Macintosh Archives / Textfiles / cracking / BeginnersMacAssembly.sit.hqx / BeginnersMacAssembly.rsrc / PICT_95.png < prev    next >
Portable Network Graphic  |  1997-07-26  |  102KB  |  816x1056  |  8-bit (256 colors)
Labels: book | poster | reckoner | sky | windowpane
OCR: Sat, Feb 17 1996 Beginners Guide Macintosh Assembly Language Programming age lhz r21 4(r20 subic r21 r21 100 r21,4(r22 *bottom- -100 lhz r20) subic r21. r21 ,100 r21. ,6(r22) *right-100 r26, 100 *loop count draw 100 circles, each slightly bigger. 0N draw r26 circles, each slightly larger than the last circles: param1,viewrect 2(bss) *top,left,bott,right viewrect 2 is a *copy of viewrect Xcall PaintOyal *takes rectangle as its only parameter - *simple? la r20. viewrect 2bss lhz r21. r20 subic r21 stl r21,(r20) *top-2 lhz subic stl 21 2(r20) *left-2 lhz 20 addic stl r21 4r20 *bottom+2 lh r20 addic. 6r20 *right+2 subic r26, r26,1 bne circles mtlr r29 blr PaintOval takes rectangle and draws a filled disc within the confines of the rectangle Thus by making the rectangle slightly larger on each ...